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n«00< □ 8008 E 8080 



lute .nliMioii.il sheets il necessary I 



t4» 



. e.| , f 'fl 

V<tw*re 



|ll()Ut 

e*,! meters 



Output 
Results 



'i RCO i (if IV I MS I ON l-'OMNNK 
Converts binary value (1-24 bits) to its BCD value (1-8 digits) 



NONL 



NONE 



H and L registers (jointing to Most Significant BCD digits buffer 

D and E registers pointing to Least Significant byte of binary value 

A register has the number of bits to be converted. 



H and I registers pointing to Most Significant BCD digit buffer 



Registers Modified 




Maximum Subroutine Nesting level 


All but H,L and D,E 






1 


RAM Required' 




Assembler/Compiler Used 


3 bytes 






MAC80 


ROM Required 




Progr;immei 


Choti Hock t*6ow 


17b bytes 






i'ok. t i'011 i X 






Company 


Box 5 , Depl . 50-447 
Beaver ton, Oreqori 07077 
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KEF NO BBltd 

PROGRAM NfiME BIN TO BCD ROUTINE 



BINhRY fO Bi. I • Buin ENE 
t m timni t » 1 + ♦ » ♦ + ♦ 



ON ENTERING THIS program 
HI REG POINTS 1 MS BCD DIGIT BUFFER 

•OS -8 FOR MAXIMUM CASE IF 24 BITS 
L'F REG POINTS TO LS BVTF OF BINARY VAI UE 
H REG HAS THE NUMBER OF BITS TO BE OONVERTfcf 

ON EX I I 

m. REG POINTERS TO MS BCD D16J1 BUFFER 

f 4i ' T F 1 BCfc DIG! T PER BYTE FOR I ASY CONVERSION 10 AS* I I 
EG m REO. =10 BCD BUFFER NEEDS ONEV 4 BVTE 



IK BlNHR'x VALUE IS O, BCD BUFFER IS NOT ' 1 EhRED 



SBfN. 



ION HDDFL SS EOF -r-jirtN.. Dfc REG 

S^XZHy'' • NUMBER OF B 1 fS SAVEC' LOCATION 



n200 




UR+j 


,'MHH - 


















BIMBCD 






11 1111 


221200 


ST A 


MB 1 I 


-4..MVE Ni H IBFF Of BITS 


0£ " 


D6 


pi ISH 





• SAVE DE . POINTER F i iF 


i"t204 


ES 


PUSH 


H 


. SAVE HI .PfO NI FP F( >F 


0205 


EE 


: :c hi j 






0206 


22 l BOO 


SHED 


SB I N 


■ :.HVt BIN POINTI F I C 






IF: 1 1 1 BINARY 


VHI Uf 


I S XFRO 


020y 


OF 


xra 


H 


i L t UF A REG 


02 OFT 


TE 


MOV 


A. M 


, PIO UP LS BY I F 


020B 


2E 


; .i 


H 




02 or 


SE 


HI '1 


H 


hdd ui ne;;t hihhef 


020D 


2B 


i .i : 


H 




20F 


:-:F 


Hi 1 


M 


. «r*C» i N if BVTi 


ii. nF- 


CATFO- 


1 


t.. .LI- 


■ IF BI NhRV VHI. t IE - u 













F i iF ii iNVF RS I ON 
L.SE t iF B i NhRN' 



— tz 
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n 

♦ ft* 
4 HV 

iff0C 

. ••4.-, 

(•;""<•: »v 
C27402 



.'if Fl 

is i i. ^ 













:■:« hg 




3 RESTORE BCD POINTER 




EDM 


NB i T 


; PIC* UP' NUNBEP uF B I I S Of 




CP I 


24 


j 2**24 * 1 6777216.* ifln, 




TZ 


TEN ? 






CP I 


18 


; 2**18 - 2. 62144 * 1M+ +.S 




JNC 


TENt • 


; NO CRPPV *> G. T 2**18 




CP 1 


15 


/2-++15 - 2 2 7 c. 8 ♦ 10+14 




JNC 


TENS 


/NO CARRY *> G T 2*4*1*3 




CP I 


12 


2**12 — 4 096 * L& * * S 




INf 


TEN4 


■'NO CARRY G T 2**12' 




CP I 








TNC 


ten: 






CP I 


if. 






TNC 


TEN2 






CP I 








TNC 


TEN1 






JNP 


TP NO 


; REACHED IF MBIT 2 


BEGIN 


CONVERIGN 




• 

TF f J7 


MV I 


D. 98H 


» 9S9680H - 10* + " 




LX1 


B. y6: r :0H 






CALL. 


digit 




TEN*- 


MV I 


r<. ofh 


;0F4240H - 10+ +6 




l::i 


B, 4240H 






I ALL 


D I G 1 1" 




TENS . 


m i 


D. 1 


,'■ 0186AWH - 1.0+ ♦ 




LXI 


B, 86A0H 






CALL 


DIGIT 




TEN4 


MV I 


[•, 






LXI 


F:> 1.00 Mm 






CALL 


r • f G I T 




IE f J . 


NV T 


D» h 






l::i 


Bi 1000 






CALl 


Di6 1 r 




1 FN 


MV 1 


t ' . 






1 K.I 


Br Inn 






L HL i 


oim i 




n hi 


MV l 


l'. 






i i 


B< In 






HI 1 . 


DIGIT 




Ti Nu 


MV ! 


D' f n 








Bi i 






! HI i 


DIG11 






H4F 


E; :i i 




1 










■ i f 


H 


r PE1 UK r< HL 1 Ci$H 1 I ML, ! i 1 i 




EOF 




; PF TURN Df PCitNl tWG Fl ,r 




PET 







./NVERSIuN 



iF BINHP 
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. SUBftflCTION ROUTINE 
MGIT 



subi 




HVI 


M, 


, INITIALIZE DIGIT 






i FOR BCD, DIGIT=0 






i FOR flSC 1 1 , D I G I T=30H 


PUSH 


H 


, SAVE BCD POINTER 


LHLD 


SB I N 


> PICK. UP BIN POINTER 


MOV 


A, M 


; PICK UP LS BVTE 


SUB 


c 




MOV 


M, A 


i PUTS IT BACK 


DCX 


H 


•POINTS TO 2ND LS BVTE 


MOV 


A, M 




see 


B 




MOV 


M. A 




DCX 


H 


, POINTS TO MS BVTE 


MOV 


A, M 




see 


D 




MOV 


M, fl 


i SAVE \> REG. 


MOV 


fl, D 


,TC 


RSTR 


i IF CARRV RESTORE 


POP 


H 


, PICK BCD POINTER 


I NR 


M 


, INCREMENT BCD POINTER 


PUSH 


H 


i SAVE BCD POINTER 


MOV 


D, fl 


; RESTORE D REG. 


,TMP 


SUB1 





, RESTORE ROUTINE 
RSTR : 





57 


MOV 


D, A 


; RESTORE D REG. 




2A1006 


LHLD 


SB IN 


. PICK UP BIN POINTER 


£A2 


7E 


MOV 


A, M 




2A3 


81 


ADD 


c 




fcA4 


77 


MOV 


M, A 




Ifftt 


2B 


DCX 


H 


■ POINTS TO 2ND LS BVTE 


feflfc- 


7E 


MOV 


A, M 




£Lfl7 


8S 


ADC 


B 




2A8 


77 


MOV 


H. A 




2A9 


2B 


DCX 


H 




I2flfl 


7E 


MOV 


A, M 


; PICKS UP MS BVTE 


»2flB 


8fi 


ADC 


D 




J2AC 


77 


MOV 


M. A 




>2AD 


El 


POP 


H 


) PICKS UP BCD POINTER 


,2AE 


23. 


I NX 


H 


■POINTS TO NEXT BCD DIGIT 


>2AF 


cs 


RET 










END 







5 6>a> : 



LooP 3 



ft 

D 



4 SCD C-rt.t,-. , 



